home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 039a / mawk10.zip / MAKESCAN.C < prev    next >
C/C++ Source or Header  |  1991-10-05  |  3KB  |  130 lines
  1.  
  2. /********************************************
  3. makescan.c
  4. copyright 1991, Michael D. Brennan
  5.  
  6. This is a source file for mawk, an implementation of
  7. the AWK programming language.
  8.  
  9. Mawk is distributed without warranty under the terms of
  10. the GNU General Public License, version 2, 1991.
  11. ********************************************/
  12.  
  13. /*$Log:    makescan.c,v $
  14.  * Revision 3.2.1.1  91/09/14  17:23:42  brennan
  15.  * VERSION 1.0
  16.  * 
  17.  * Revision 3.2  91/06/28  04:17:00  brennan
  18.  * VERSION 0.999
  19.  * 
  20.  * Revision 3.1  91/06/07  10:27:51  brennan
  21.  * VERSION 0.995
  22.  * 
  23.  * Revision 2.1  91/04/08  08:23:29  brennan
  24.  * VERSION 0.97
  25.  * 
  26. */
  27.  
  28. /* source for makescan.exe which builds the scancode[]
  29.    via:   makescan.exe > scancode.c
  30. */
  31.  
  32. #ifdef THINK_C
  33. #include <stdio.h>
  34. #include <console.h>
  35. #include <string.h>
  36. #define SIZE_T(x) (size_t)(x)
  37. #endif
  38.  
  39. #ifndef SIZE_T
  40. #define SIZE_T(x) (x)
  41. #endif
  42.  
  43. #define  MAKESCAN
  44.  
  45. #include  "scan.h"
  46.  
  47. char   scan_code[256] ;
  48.  
  49. void  scan_init()
  50. { 
  51.   register char *p ;
  52.  
  53.   (void) memset(scan_code, SC_UNEXPECTED, SIZE_T(sizeof(scan_code))) ;
  54.   for( p = scan_code + '0' ; p <= scan_code + '9' ; p++ )
  55.        *p = SC_DIGIT ;
  56.   scan_code[0] = 0 ;
  57.   scan_code[ ' ' ] = scan_code['\t'] = scan_code['\f'] = SC_SPACE ;
  58.   scan_code[ '\r'] = scan_code['\013'] = SC_SPACE ;
  59.  
  60.   scan_code[';'] = SC_SEMI_COLON ;
  61.   scan_code['\n'] = SC_NL ;
  62.   scan_code['{'] = SC_LBRACE ;
  63.   scan_code[ '}'] = SC_RBRACE ;
  64.   scan_code['+'] = SC_PLUS ;
  65.   scan_code['-'] = SC_MINUS ;
  66.   scan_code['*'] = SC_MUL ;
  67.   scan_code['/'] = SC_DIV ;
  68.   scan_code['%'] = SC_MOD ;
  69.   scan_code['^'] = SC_POW ;
  70.   scan_code['('] = SC_LPAREN ;
  71.   scan_code[')'] = SC_RPAREN ;
  72.   scan_code['_'] = SC_IDCHAR ;
  73.   scan_code['='] = SC_EQUAL ;
  74.   scan_code['#'] = SC_COMMENT ;
  75.   scan_code['\"'] = SC_DQUOTE ;
  76.   scan_code[','] = SC_COMMA ;
  77.   scan_code['!'] = SC_NOT ;
  78.   scan_code['<'] = SC_LT ;
  79.   scan_code['>'] = SC_GT ;
  80.   scan_code['|'] = SC_OR ;
  81.   scan_code['&'] = SC_AND ;
  82.   scan_code['?'] = SC_QMARK ;
  83.   scan_code[':'] = SC_COLON ;
  84.   scan_code['['] = SC_LBOX ;
  85.   scan_code[']'] = SC_RBOX ;
  86.   scan_code['\\'] = SC_ESCAPE ;
  87.   scan_code['.'] = SC_DOT ;
  88.   scan_code['~'] = SC_MATCH ;
  89.   scan_code['$'] = SC_DOLLAR ;
  90.  
  91.   for( p = scan_code + 'A' ; p <= scan_code + 'Z' ; p++ )
  92.        *p = *(p + 'a' - 'A') = SC_IDCHAR ;
  93.  
  94. }
  95.  
  96. void scan_print()
  97. { register char *p = scan_code ;
  98.   register int c ; /* column */
  99.   register int r ; /* row */
  100.  
  101.   printf("\n\n/* scancode.c */\n\n\n") ;
  102.   printf( "char scan_code[256] = {\n" ) ;
  103.  
  104.   for( r = 1 ; r <= 16 ; r++)
  105.   {
  106.     for( c = 1 ; c <= 16 ; c++)
  107.     {
  108.       printf("%2d" , *p++) ;
  109.       if ( r != 16 || c != 16 )  putchar(',') ;
  110.     }
  111.     putchar('\n') ;
  112.   }
  113.  
  114.   printf("} ;\n") ;
  115. }
  116.  
  117.  
  118. int main(argc,argv)
  119. int argc;
  120. char **argv;
  121. {
  122. #ifdef THINK_C
  123. fprintf(stderr, "MAKESCAN for MacMAWK\n");
  124. SetWTitle( FrontWindow(), "\pPC-KIMMO");
  125. argc = ccommand(&argv);
  126. #endif
  127.   scan_init() ; scan_print() ;
  128.   return 0 ;
  129. }
  130.